/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Prog / M / MacsBug 6.2.1.cpt / MacsBug 6.2.1 / dcmds / Pascal Samples / Echo.p

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 06 45 63 68 6f 2e 70 | 00 00 00 00 00 00 00 00 |..Echo.p|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 09 3f 00 | 00 04 3b a4 44 ea e0 a4 |......?.|..;.D...|
|00000060| 44 ea e0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |D.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 75 f3 00 00 |........|....u...|
|00000080| 55 4e 49 54 20 45 63 68 | 6f 3b 0d 0d 28 2a 20 54 |UNIT Ech|o;..(* T|
|00000090| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 4d 50 57 |he follo|wing MPW|
|000000a0| 20 63 6f 6d 6d 61 6e 64 | 73 20 77 69 6c 6c 20 62 | command|s will b|
|000000b0| 75 69 6c 64 20 74 68 65 | 20 64 63 6d 64 20 61 6e |uild the| dcmd an|
|000000c0| 64 20 63 6f 70 79 20 69 | 74 20 74 6f 20 74 68 65 |d copy i|t to the|
|000000d0| 0d 20 20 20 22 44 65 62 | 75 67 67 65 72 20 50 72 |.   "Deb|ugger Pr|
|000000e0| 65 66 73 22 20 66 69 6c | 65 20 69 6e 20 74 68 65 |efs" fil|e in the|
|000000f0| 20 53 79 73 74 65 6d 20 | 66 6f 6c 64 65 72 2e 20 | System |folder. |
|00000100| 54 68 65 20 64 63 6d 64 | 27 73 20 6e 61 6d 65 20 |The dcmd|'s name |
|00000110| 69 6e 0d 09 09 20 4d 61 | 63 73 42 75 67 20 77 69 |in... Ma|csBug wi|
|00000120| 6c 6c 20 62 65 20 74 68 | 65 20 6e 61 6d 65 20 6f |ll be th|e name o|
|00000130| 66 20 74 68 65 20 66 69 | 6c 65 20 62 75 69 6c 74 |f the fi|le built|
|00000140| 20 62 79 20 74 68 65 20 | 4c 69 6e 6b 65 72 2e 0d | by the |Linker..|
|00000150| 0d 09 20 20 20 20 50 61 | 73 63 61 6c 20 45 63 68 |..    Pa|scal Ech|
|00000160| 6f 2e 70 0d 09 20 20 20 | 20 4c 69 6e 6b 20 64 63 |o.p..   | Link dc|
|00000170| 6d 64 47 6c 75 65 2e 61 | 2e 6f 20 45 63 68 6f 2e |mdGlue.a|.o Echo.|
|00000180| 70 2e 6f 20 7b 4c 69 62 | 72 61 72 69 65 73 7d 52 |p.o {Lib|raries}R|
|00000190| 75 6e 74 69 6d 65 2e 6f | 20 7b 50 4c 69 62 72 61 |untime.o| {PLibra|
|000001a0| 72 69 65 73 7d 50 61 73 | 4c 69 62 2e 6f 20 2d 6f |ries}Pas|Lib.o -o|
|000001b0| 20 45 63 68 6f 0d 09 20 | 20 20 20 42 75 69 6c 64 | Echo.. |   Build|
|000001c0| 44 63 6d 64 20 45 63 68 | 6f 20 31 30 31 0d 09 09 |Dcmd Ech|o 101...|
|000001d0| 09 09 09 45 63 68 6f 20 | 27 69 6e 63 6c 75 64 65 |...Echo |'include|
|000001e0| 20 22 45 63 68 6f 22 3b | 27 09 09 09 7c 09 09 09 | "Echo";|'...|...|
|000001f0| 52 65 7a 20 2d 61 20 2d | 6f 20 22 7b 73 79 73 74 |Rez -a -|o "{syst|
|00000200| 65 6d 46 6f 6c 64 65 72 | 7d 44 65 62 75 67 67 65 |emFolder|}Debugge|
|00000210| 72 20 50 72 65 66 73 22 | 0d 2a 29 0d 0d 7b 24 52 |r Prefs"|.*)..{$R|
|00000220| 2d 7d 0d 0d 49 4e 54 45 | 52 46 41 43 45 0d 0d 09 |-}..INTE|RFACE...|
|00000230| 09 55 53 45 53 20 4d 65 | 6d 54 79 70 65 73 2c 20 |.USES Me|mTypes, |
|00000240| 64 63 6d 64 3b 0d 09 09 | 0d 20 20 7b 20 50 75 62 |dcmd;...|.  { Pub|
|00000250| 6c 69 63 20 64 65 63 6c | 61 72 61 74 69 6f 6e 20 |lic decl|aration |
|00000260| 66 6f 72 20 64 63 6d 64 | 47 6c 75 65 2e 20 4d 75 |for dcmd|Glue. Mu|
|00000270| 73 74 20 62 65 20 69 6e | 20 65 76 65 72 79 20 64 |st be in| every d|
|00000280| 63 6d 64 2e 20 54 68 65 | 20 6e 61 6d 65 20 63 61 |cmd. The| name ca|
|00000290| 6e 6e 6f 74 20 62 65 20 | 63 68 61 6e 67 65 64 2e |nnot be |changed.|
|000002a0| 20 7d 0d 09 09 50 52 4f | 43 45 44 55 52 45 20 43 | }...PRO|CEDURE C|
|000002b0| 6f 6d 6d 61 6e 64 45 6e | 74 72 79 20 28 70 61 72 |ommandEn|try (par|
|000002c0| 61 6d 50 74 72 3a 20 64 | 63 6d 64 42 6c 6f 63 6b |amPtr: d|cmdBlock|
|000002d0| 50 74 72 29 3b 0d 0d 0d | 49 4d 50 4c 45 4d 45 4e |Ptr);...|IMPLEMEN|
|000002e0| 54 41 54 49 4f 4e 0d 0d | 43 4f 4e 53 54 20 43 52 |TATION..|CONST CR|
|000002f0| 20 3d 20 24 30 44 3b 0d | 0d 0d 50 52 4f 43 45 44 | = $0D;.|..PROCED|
|00000300| 55 52 45 20 4e 75 6d 62 | 65 72 54 6f 48 65 78 20 |URE Numb|erToHex |
|00000310| 28 6e 75 6d 62 65 72 3a | 20 4c 4f 4e 47 49 4e 54 |(number:| LONGINT|
|00000320| 3b 20 56 41 52 20 68 65 | 78 3a 20 53 74 72 32 35 |; VAR he|x: Str25|
|00000330| 35 29 3b 0d 56 41 52 20 | 64 69 67 69 74 73 3a 20 |5);.VAR |digits: |
|00000340| 53 74 72 32 35 35 3b 0d | 20 20 20 20 6e 3a 20 49 |Str255;.|    n: I|
|00000350| 4e 54 45 47 45 52 3b 0d | 42 45 47 49 4e 0d 20 20 |NTEGER;.|BEGIN.  |
|00000360| 64 69 67 69 74 73 20 3a | 3d 20 27 30 31 32 33 34 |digits :|= '01234|
|00000370| 35 36 37 38 39 41 42 43 | 44 45 46 27 3b 0d 09 09 |56789ABC|DEF';...|
|00000380| 68 65 78 20 20 20 20 3a | 3d 20 27 30 30 30 30 30 |hex    :|= '00000|
|00000390| 30 30 30 27 3b 0d 09 09 | 46 4f 52 20 6e 20 3a 3d |000';...|FOR n :=|
|000003a0| 20 38 20 44 4f 57 4e 54 | 4f 20 31 20 44 4f 0d 09 | 8 DOWNT|O 1 DO..|
|000003b0| 09 20 20 42 45 47 49 4e | 0d 09 09 09 09 68 65 78 |.  BEGIN|.....hex|
|000003c0| 5b 6e 5d 20 3a 3d 20 64 | 69 67 69 74 73 5b 31 20 |[n] := d|igits[1 |
|000003d0| 2b 20 28 6e 75 6d 62 65 | 72 20 4d 4f 44 20 31 36 |+ (numbe|r MOD 16|
|000003e0| 29 5d 3b 0d 09 09 09 09 | 6e 75 6d 62 65 72 20 3a |)];.....|number :|
|000003f0| 3d 20 6e 75 6d 62 65 72 | 20 44 49 56 20 31 36 3b |= number| DIV 16;|
|00000400| 0d 09 09 09 09 45 4e 44 | 3b 0d 45 4e 44 3b 0d 0d |.....END|;.END;..|
|00000410| 0d 50 52 4f 43 45 44 55 | 52 45 20 43 6f 6d 6d 61 |.PROCEDU|RE Comma|
|00000420| 6e 64 45 6e 74 72 79 20 | 28 70 61 72 61 6d 50 74 |ndEntry |(paramPt|
|00000430| 72 3a 20 44 43 6d 64 42 | 6c 6f 63 6b 50 74 72 29 |r: DCmdB|lockPtr)|
|00000440| 3b 0d 56 41 52 20 70 6f | 73 3a 20 20 20 49 4e 54 |;.VAR po|s:   INT|
|00000450| 45 47 45 52 3b 0d 20 20 | 20 20 63 68 3a 20 20 20 |EGER;.  |  ch:   |
|00000460| 20 43 48 41 52 3b 0d 09 | 09 09 09 76 61 6c 75 65 | CHAR;..|...value|
|00000470| 3a 20 4c 4f 4e 47 49 4e | 54 3b 0d 09 09 09 09 6f |: LONGIN|T;.....o|
|00000480| 6b 3a 20 20 20 20 42 4f | 4f 4c 45 41 4e 3b 0d 09 |k:    BO|OLEAN;..|
|00000490| 09 09 09 73 74 72 3a 20 | 20 20 53 74 72 32 35 35 |...str: |  Str255|
|000004a0| 3b 0d 42 45 47 49 4e 0d | 20 20 49 46 20 70 61 72 |;.BEGIN.|  IF par|
|000004b0| 61 6d 50 74 72 5e 2e 72 | 65 71 75 65 73 74 20 3d |amPtr^.r|equest =|
|000004c0| 20 64 63 6d 64 49 6e 69 | 74 20 54 48 45 4e 0d 09 | dcmdIni|t THEN..|
|000004d0| 09 20 20 42 45 47 49 4e | 20 7b 20 54 68 65 20 64 |.  BEGIN| { The d|
|000004e0| 63 6d 64 20 67 65 74 73 | 20 63 61 6c 6c 65 64 20 |cmd gets| called |
|000004f0| 6f 6e 63 65 20 77 68 65 | 6e 20 6c 6f 61 64 65 64 |once whe|n loaded|
|00000500| 20 74 6f 20 69 6e 69 74 | 20 69 74 73 65 6c 66 20 | to init| itself |
|00000510| 7d 0d 09 09 09 09 45 4e | 44 0d 09 09 45 4c 53 45 |}.....EN|D...ELSE|
|00000520| 0d 20 20 49 46 20 70 61 | 72 61 6d 50 74 72 5e 2e |.  IF pa|ramPtr^.|
|00000530| 72 65 71 75 65 73 74 20 | 3d 20 64 63 6d 64 44 6f |request |= dcmdDo|
|00000540| 49 74 20 54 48 45 4e 0d | 09 09 20 20 42 45 47 49 |It THEN.|..  BEGI|
|00000550| 4e 20 7b 20 44 6f 20 74 | 68 65 20 63 6f 6d 6d 61 |N { Do t|he comma|
|00000560| 6e 64 27 73 20 6e 6f 72 | 6d 61 6c 20 66 75 6e 63 |nd's nor|mal func|
|00000570| 74 69 6f 6e 20 7d 0d 09 | 09 09 09 64 63 6d 64 44 |tion }..|...dcmdD|
|00000580| 72 61 77 4c 69 6e 65 20 | 28 27 45 63 68 6f 69 6e |rawLine |('Echoin|
|00000590| 67 20 70 61 72 61 6d 65 | 74 65 72 73 27 29 3b 0d |g parame|ters');.|
|000005a0| 0d 20 20 20 20 52 45 50 | 45 41 54 0d 20 20 20 20 |.    REP|EAT.    |
|000005b0| 20 20 7b 20 53 61 76 65 | 20 74 68 65 20 70 6f 73 |  { Save| the pos|
|000005c0| 69 74 69 6f 6e 20 73 6f | 20 77 65 20 63 61 6e 20 |ition so| we can |
|000005d0| 72 65 77 69 6e 64 20 69 | 66 20 77 65 20 67 65 74 |rewind i|f we get|
|000005e0| 20 61 6e 20 65 72 72 6f | 72 20 7d 0d 09 09 09 09 | an erro|r }.....|
|000005f0| 20 20 70 6f 73 20 3a 3d | 20 64 63 6d 64 47 65 74 |  pos :=| dcmdGet|
|00000600| 50 6f 73 69 74 69 6f 6e | 3b 0d 09 09 09 09 09 09 |Position|;.......|
|00000610| 63 68 20 20 3a 3d 20 64 | 63 6d 64 50 65 65 6b 41 |ch  := d|cmdPeekA|
|00000620| 74 4e 65 78 74 43 68 61 | 72 3b 0d 09 09 09 09 09 |tNextCha|r;......|
|00000630| 09 49 46 20 63 68 20 49 | 4e 20 5b 27 41 27 2e 2e |.IF ch I|N ['A'..|
|00000640| 27 5a 27 2c 20 27 61 27 | 2e 2e 27 7a 27 5d 20 54 |'Z', 'a'|..'z'] T|
|00000650| 48 45 4e 0d 09 09 09 09 | 09 09 09 09 42 45 47 49 |HEN.....|....BEGI|
|00000660| 4e 20 7b 20 47 65 74 20 | 74 68 65 20 70 61 72 61 |N { Get |the para|
|00000670| 6d 65 74 65 72 20 61 73 | 20 61 20 74 65 78 74 20 |meter as| a text |
|00000680| 73 74 72 69 6e 67 20 7d | 0d 09 09 09 09 09 09 09 |string }|........|
|00000690| 09 63 68 20 3a 3d 20 64 | 63 6d 64 47 65 74 4e 65 |.ch := d|cmdGetNe|
|000006a0| 78 74 50 61 72 61 6d 65 | 74 65 72 20 28 73 74 72 |xtParame|ter (str|
|000006b0| 29 3b 0d 09 09 09 09 09 | 09 09 09 64 63 6d 64 44 |);......|...dcmdD|
|000006c0| 72 61 77 4c 69 6e 65 20 | 28 73 74 72 29 3b 0d 09 |rawLine |(str);..|
|000006d0| 09 09 09 09 09 09 09 45 | 4e 44 0d 09 09 09 09 09 |.......E|ND......|
|000006e0| 09 45 4c 53 45 0d 09 09 | 09 09 09 09 09 09 42 45 |.ELSE...|......BE|
|000006f0| 47 49 4e 20 7b 20 47 65 | 74 20 74 68 65 20 70 61 |GIN { Ge|t the pa|
|00000700| 72 61 6d 65 74 65 72 20 | 61 73 20 61 20 33 32 20 |rameter |as a 32 |
|00000710| 62 69 74 20 76 61 6c 75 | 65 20 7d 0d 09 09 09 09 |bit valu|e }.....|
|00000720| 09 09 09 09 63 68 20 3a | 3d 20 64 63 6d 64 47 65 |....ch :|= dcmdGe|
|00000730| 74 4e 65 78 74 45 78 70 | 72 65 73 73 69 6f 6e 20 |tNextExp|ression |
|00000740| 28 76 61 6c 75 65 2c 20 | 6f 6b 29 3b 0d 09 09 09 |(value, |ok);....|
|00000750| 09 09 09 09 09 49 46 20 | 6f 6b 20 54 48 45 4e 0d |.....IF |ok THEN.|
|00000760| 09 09 09 09 09 09 09 09 | 09 09 42 45 47 49 4e 20 |........|..BEGIN |
|00000770| 7b 20 54 68 65 20 65 78 | 70 72 65 73 73 69 6f 6e |{ The ex|pression|
|00000780| 20 77 61 73 20 70 61 72 | 73 65 64 20 63 6f 72 72 | was par|sed corr|
|00000790| 65 63 74 6c 79 20 7d 0d | 09 09 09 09 09 09 09 09 |ectly }.|........|
|000007a0| 09 09 4e 75 6d 62 65 72 | 54 6f 48 65 78 20 20 28 |..Number|ToHex  (|
|000007b0| 76 61 6c 75 65 2c 20 73 | 74 72 29 3b 0d 09 09 09 |value, s|tr);....|
|000007c0| 09 09 09 09 09 09 09 64 | 63 6d 64 44 72 61 77 4c |.......d|cmdDrawL|
|000007d0| 69 6e 65 20 28 73 74 72 | 29 3b 0d 09 09 09 09 09 |ine (str|);......|
|000007e0| 09 09 09 09 09 45 4e 44 | 0d 09 09 09 09 09 09 09 |.....END|........|
|000007f0| 09 45 4c 53 45 0d 09 09 | 09 09 09 09 09 09 20 20 |.ELSE...|......  |
|00000800| 42 45 47 49 4e 20 7b 20 | 54 68 65 20 65 78 70 72 |BEGIN { |The expr|
|00000810| 65 73 73 69 6f 6e 20 63 | 6f 6e 74 61 69 6e 65 64 |ession c|ontained|
|00000820| 20 61 6e 20 65 72 72 6f | 72 2e 20 47 65 74 20 69 | an erro|r. Get i|
|00000830| 74 20 61 73 20 61 20 73 | 74 72 69 6e 67 20 7d 0d |t as a s|tring }.|
|00000840| 09 09 09 09 09 09 09 09 | 09 09 64 63 6d 64 53 65 |........|..dcmdSe|
|00000850| 74 50 6f 73 69 74 69 6f | 6e 20 28 70 6f 73 29 3b |tPositio|n (pos);|
|00000860| 0d 09 09 09 09 09 09 09 | 09 20 20 63 68 20 3a 3d |........|.  ch :=|
|00000870| 20 64 63 6d 64 47 65 74 | 4e 65 78 74 50 61 72 61 | dcmdGet|NextPara|
|00000880| 6d 65 74 65 72 20 28 73 | 74 72 29 3b 0d 09 09 09 |meter (s|tr);....|
|00000890| 09 09 09 09 09 20 20 64 | 63 6d 64 44 72 61 77 4c |.....  d|cmdDrawL|
|000008a0| 69 6e 65 20 28 73 74 72 | 29 3b 0d 09 09 09 09 09 |ine (str|);......|
|000008b0| 09 09 09 09 09 45 4e 44 | 3b 0d 09 09 09 09 09 09 |.....END|;.......|
|000008c0| 09 09 45 4e 44 3b 0d 09 | 09 09 09 55 4e 54 49 4c |..END;..|...UNTIL|
|000008d0| 20 63 68 20 3d 20 43 48 | 52 28 43 52 29 3b 0d 09 | ch = CH|R(CR);..|
|000008e0| 09 09 09 45 4e 44 0d 09 | 09 45 4c 53 45 0d 20 20 |...END..|.ELSE.  |
|000008f0| 49 46 20 70 61 72 61 6d | 50 74 72 5e 2e 72 65 71 |IF param|Ptr^.req|
|00000900| 75 65 73 74 20 3d 20 64 | 63 6d 64 48 65 6c 70 20 |uest = d|cmdHelp |
|00000910| 54 48 45 4e 0d 09 09 20 | 20 42 45 47 49 4e 20 7b |THEN... | BEGIN {|
|00000920| 20 44 69 73 70 6c 61 79 | 20 74 68 65 20 63 6f 6d | Display| the com|
|00000930| 6d 61 6e 64 27 73 20 68 | 65 6c 70 20 69 6e 66 6f |mand's h|elp info|
|00000940| 72 6d 61 74 69 6f 6e 20 | 7d 0d 09 09 09 09 64 63 |rmation |}.....dc|
|00000950| 6d 64 44 72 61 77 4c 69 | 6e 65 20 28 27 45 43 48 |mdDrawLi|ne ('ECH|
|00000960| 4f 20 5b 70 61 72 61 6d | 73 2e 2e 2e 5d 27 29 3b |O [param|s...]');|
|00000970| 0d 09 09 09 09 64 63 6d | 64 44 72 61 77 4c 69 6e |.....dcm|dDrawLin|
|00000980| 65 20 28 27 20 20 20 45 | 63 68 6f 20 74 68 65 20 |e ('   E|cho the |
|00000990| 63 6f 6d 6d 61 6e 64 20 | 6c 69 6e 65 20 70 61 72 |command |line par|
|000009a0| 61 6d 65 74 65 72 73 27 | 29 3b 0d 09 09 09 09 45 |ameters'|);.....E|
|000009b0| 4e 44 3b 0d 45 4e 44 3b | 0d 0d 45 4e 44 2e 0d 00 |ND;.END;|..END...|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 01 00 00 00 03 a3 | 00 00 02 a3 00 00 00 98 |........|........|
|00000a10| 4e ad 01 ba 2e 00 9e 9f | 20 06 72 10 d0 81 2f 00 |N.......| .r.../.|
|00000a20| 4e ad 06 02 30 2d da 46 | 48 c0 d0 86 2f 00 4e ad |N...0-.F|H.../.N.|
|00000a30| 06 45 63 68 6f 2e 70 45 | 02 00 00 00 54 45 58 54 |.Echo.pE|....TEXT|
|00000a40| 4d 50 53 20 01 00 00 00 | 00 c0 00 00 00 00 8b 30 |MPS ....|.......0|
|00000a50| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 00 00 c0 |..TEXTMP|S ......|
|00000a60| 00 00 3b d2 00 00 00 00 | 00 00 00 00 00 00 00 00 |..;.....|........|
|00000a70| 00 00 a4 44 b2 a0 00 00 | 09 3f 00 00 04 3b 48 e7 |...D....|.?...;H.|
|00000a80| 03 08 2c 2e 00 08 20 6d | ff da 20 2d ff ce d0 88 |..,... m|.. -....|
|00000a90| 28 40 52 8c 2f 2e 00 0c | 2f 0c 2f 06 4e ad 02 f2 |(@R./...|/./.N...|
|00000aa0| 20 2d ff ce 52 80 22 06 | d2 ad ff ce 2d 41 ff f4 | -..R.".|....-A..|
|00000ab0| 2e 00 60 12 20 6d ff d6 | 20 07 22 00 e6 80 03 f0 |..`. m..| .".....|
|00000ac0| 08 00 52 87 69 06 be ae | ff f4 6f e8 20 06 d1 ad |..R.i...|..o. ...|
|00000ad0| ff ce 4c df 10 c0 4e 5e | 20 5f 50 4f 4e d0 8a 50 |..L...N^| _PON..P|
|00000ae0| 55 54 42 55 46 46 53 45 | 51 00 00 00 4e 56 ff fc |UTBUFFSE|Q...NV..|
|00000af0| 48 e7 03 18 26 6e 00 0c | 2c 2e 00 08 28 4b 4a 86 |H...&n..|,...(KJ.|
|00000b00| 00 00 00 9c 00 41 05 72 | 7f ff ff ff 41 4c 00 00 |.....A.r|....AL..|
|00000b10| ff ff ff ff 01 00 00 36 | 00 00 00 00 00 00 00 00 |.......6|........|
|00000b20| 01 00 06 ad 00 00 00 00 | 01 00 00 9c 00 00 00 00 |........|........|
|00000b30| a3 c9 eb d2 00 ad 00 12 | ff af 00 e7 d1 e3 0e 07 |........|........|
|00000b40| 00 e3 2e 2e 00 14 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000b50| ff ff 00 00 01 80 01 00 | 04 01 00 01 01 00 00 6c |........|.......l|
|00000b60| ff ff 00 81 00 0c ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 4b 93 e2 44 bf ff | 42 10 08 2b ff ff ff ff |..K..D..|B..+....|
|00000b80| ff ff ff ff ff ff ff ff | 02 00 04 dc 01 00 02 00 |........|........|
|00000b90| 10 2b ff ff 00 02 00 00 | 00 08 37 40 00 08 20 6e |.+......|..7@.. n|
|00000ba0| 00 00 00 04 b6 0a 25 e7 | 00 00 01 5c a1 52 96 6f |......%.|...\.R.o|
|00000bb0| a3 c9 eb d4 a2 f8 64 44 | 00 01 00 e3 ff ff ff ff |......dD|........|
|00000bc0| 4a 05 08 01 00 00 00 00 | 01 00 00 01 00 00 00 03 |J.......|........|
|00000bd0| 00 1e 33 92 00 1e 4b 08 | 00 02 51 c8 ff fc 17 53 |..3...K.|..Q....S|
|00000be0| 74 61 6e 64 61 72 64 20 | 50 61 73 63 61 6c 20 53 |tandard |Pascal S|
|00000bf0| 79 6d 62 6f 6c 73 5c 88 | 70 3f 22 d8 51 c8 ff fc |ymbols\.|p?".Q...|
|00000c00| 60 0c 41 ee fd fc 43 fa | 00 a6 20 d9 30 91 48 6d |`.A...C.|.. .0.Hm|
|00000c10| ed 40 48 7a 00 8a 42 67 | 4e ad 0c 4a 48 6d 00 1e |.@Hz..Bg|N..JHm..|
|00000c20| ab 86 00 1e ac 22 00 04 | a3 c9 eb d2 04 45 43 48 |....."..|.....ECH|
|00000c30| 4f 61 6c 20 65 72 72 6f | 72 20 2d 20 72 65 73 65 |Oal erro|r - rese|
|00000c40| 74 69 6e 67 20 6c 69 73 | 74 20 73 69 7a 65 24 1f |ting lis|t size$.|
|00000c50| 20 5f 22 5f 22 19 b2 98 | 6c 08 3e bc ff ff 20 42 | _"_"...|l.>... B|
|00000c60| 4e d0 67 24 3e bc 00 01 | 20 42 4e d0 00 00 00 00 |N.g$>...| BN.....|
|00000c70| 00 00 00 00 00 01 a3 c9 | eb d3 04 44 43 4d 44 61 |........|...DCMDa|
|00000c80| 6c 20 65 72 72 6f 72 20 | 2d 20 72 65 73 65 74 69 |l error |- reseti|
|00000c90| 6e 67 20 6c 69 73 74 20 | 73 69 7a 65 24 1f 20 5f |ng list |size$. _|
|00000ca0| 22 5f 22 19 b2 98 6c 08 | 3e bc ff ff 20 42 4e d0 |"_"...l.|>... BN.|
|00000cb0| 67 24 3e bc 00 01 20 42 | 4e d0 00 00 00 00 00 00 |g$>... B|N.......|
|00000cc0| 00 00 00 00 a3 5b 35 ea | 08 4d 45 4d 54 59 50 45 |.....[5.|.MEMTYPE|
|00000cd0| 53 72 72 6f 72 20 2d 20 | 72 65 73 65 74 69 6e 67 |Srror - |reseting|
|00000ce0| 20 6c 69 73 74 20 73 69 | 7a 65 24 1f 20 5f 22 5f | list si|ze$. _"_|
|00000cf0| 22 19 b2 98 6c 08 3e bc | ff ff 20 42 4e d0 67 24 |"...l.>.|.. BN.g$|
|00000d00| 3e bc 00 01 20 42 4e d0 | 00 00 00 48 00 09 4d 6f |>... BN.|...H..Mo|
|00000d10| 6e 61 63 6f 00 1d 69 90 | 00 00 00 00 66 69 6e 64 |naco..i.|....find|
|00000d20| 00 00 a5 00 4d 61 63 73 | 42 75 67 3a 64 63 00 06 |....Macs|Bug:dc..|
|00000d30| 00 04 00 2a 00 03 01 42 | 01 e3 00 2a 00 03 01 42 |...*...B|...*...B|
|00000d40| 01 e3 a3 c9 c2 c0 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d50| 00 00 01 00 00 00 00 1e | 00 2a 00 03 01 42 01 e3 |........|.*...B..|
|00000d60| 00 2a 00 03 01 42 01 e3 | 00 00 00 00 00 00 00 00 |.*...B..|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 29 01 02 80 00 00 00 |........|.)......|
|00000d80| 05 31 2e 30 2e 32 1c 4d | 61 63 73 42 75 67 20 61 |.1.0.2.M|acsBug a|
|00000d90| 6e 64 20 44 69 73 63 69 | 70 6c 69 6e 65 20 31 2e |nd Disci|pline 1.|
|00000da0| 30 2e 32 00 00 01 00 00 | 00 03 a3 00 00 02 a3 00 |0.2.....|........|
|00000db0| 00 00 98 00 5c 88 80 08 | 74 00 00 00 1c 00 7e 00 |....\...|t.....~.|
|00000dc0| 02 75 6e 69 74 00 02 00 | 1a 4d 50 53 52 00 01 00 |.unit...|.MPSR...|
|00000dd0| 3e 76 65 72 73 00 00 00 | 56 00 03 00 00 00 00 00 |>vers...|V.......|
|00000de0| 00 00 00 00 00 00 02 00 | 0a 00 00 00 a0 00 00 00 |........|........|
|00000df0| 00 00 00 00 13 00 00 00 | a8 00 00 00 00 03 ed ff |........|........|
|00000e00| ff 00 00 02 08 00 00 00 | 00 03 f0 ff ff 00 00 02 |........|........|
|00000e10| 54 00 00 00 00 00 02 ff | ff 20 00 02 76 00 5c 88 |T.......|. ..v.\.|
|00000e20| 20 09 53 79 6d 62 54 61 | 62 6c 65 08 50 61 63 6b | .SymbTa|ble.Pack|
|00000e30| 53 79 6d 73 06 48 65 61 | 64 65 72 00 00 00 00 00 |Syms.Hea|der.....|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+